home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2002 January / january_2002.iso / Piposh Special / Piposh / FRITZ1.DXR / 00141.ls < prev    next >
Encoding:
Text File  |  2004-12-06  |  675 b   |  26 lines
  1. on exitFrame
  2.   global advance, mnv, ppl
  3.   if getAt(mnv, 1) > 1 then
  4.     set the memberNum of sprite getAt(ppl, 1) to member(the memberNum of sprite getAt(ppl, 1) + 1, 2)
  5.     setAt(mnv, 1, getAt(mnv, 1) - 1)
  6.   else
  7.   end if
  8.   if advance = 1 then
  9.     foemov(43, 44, 60, 65, 66, 13, 7, 2, 2, 1, 12, 4)
  10.     strata2(1)
  11.   else
  12.     if (advance = 2) or (advance = 3) then
  13.       foemov(76, 77, 87, 94, 95, 8, 5, 3, 3, 2, 10, 3)
  14.       foemov(103, 104, 116, 122, 123, 13, 7, 4, 4, 3, 9, 5)
  15.       strata2(3)
  16.     else
  17.       if advance = 4 then
  18.         foemov(43, 44, 60, 65, 66, 13, 7, 2, 2, 1, 12, 4)
  19.         strata2(3)
  20.       else
  21.         strata2(3)
  22.       end if
  23.     end if
  24.   end if
  25. end
  26.